home *** CD-ROM | disk | FTP | other *** search
/ MacUser Mac Bin 40 / MACUSER-MACBIN40A-1997-03.ISO.7z / MACUSER-MACBIN40A-1997-03.ISO / DEMO / SecretsJ DEMO / TERORENT.DIR / 00352_Script_352 < prev   
Text File  |  1996-12-03  |  3KB  |  122 lines
  1. on startMovie
  2.   global MirL, MirR, lightState, leverstate,music,effects, rwobj
  3.   sdset
  4.   check_it
  5.   
  6. end
  7.  
  8. on stopmovie
  9.   sdsv
  10. end
  11.  
  12. on idle
  13.     set tsp = checkcur(41)
  14.   case tsp of
  15.     38:docur(2)
  16.     39:docur(3)
  17.     40:docur(1)
  18.     41:docur(4)
  19.     -1:docur(0)
  20.   end case
  21.  
  22.   chmenu
  23.   
  24. end idle
  25.  
  26.  
  27. on Check_it
  28.   global leverstate, lightState, doorstate, MirL, MirR
  29.   
  30.   if leverstate = 1 then
  31.     set the visible of sprite 6 to true
  32.   else 
  33.     set the visible of sprite 6 to false
  34.   end if
  35.   
  36.   
  37.   if lightstate = 1 then
  38.     if leverstate = 1 then
  39.       set the visible of sprite 15 to true
  40.       set the visible of sprite 22 to true
  41.       set the visible of sprite 10 to true
  42.       
  43.       if MirL = 2 then
  44.         set the visible of sprite 23 to true
  45.       else if MirL = 1 then
  46.         puppetsound "death"
  47.         go to frame "white"
  48.         set MirL = 0
  49.         set MirR = 0
  50.       else
  51.         set the visible of sprite 23 to false
  52.       end if
  53.       
  54.       if MirR = 2 then
  55.         set the visible of sprite 25 to true
  56.       else if MirR = 1 then
  57.         puppetsound "death"
  58.         go to frame "white1"
  59.         set MirL = 0
  60.         set MirR = 0
  61.       else
  62.         set the visible of sprite 25 to false
  63.       end if
  64.       
  65.       if MirL = 2 and MirR = 2 then
  66.         set doorstate = 1
  67.         set lightstate = false
  68.         set the visible of sprite 22 = true
  69.         updatestage
  70.         
  71.         slow(60)
  72.         check_it
  73.       end if
  74.     else
  75.       set the visible of sprite 25 to false
  76.       set the visible of sprite 23 to false
  77.       set the visible of sprite 10 to true
  78.       set the visible of sprite 15 to true
  79.       set the visible of sprite 22 to false
  80.     end if
  81.     
  82.   else
  83.     set the visible of sprite 25 to false
  84.     set the visible of sprite 23 to false
  85.     set the visible of sprite 10 to false
  86.     set the visible of sprite 15 to false
  87.     set the visible of sprite 22 to false
  88.   end if
  89.   
  90.   
  91.   if doorstate = 1 then
  92.     set the visible of sprite 13 to true
  93.   else
  94.     set the visible of sprite 13 to false
  95.   end if
  96.   
  97.   if MirL = 2 then
  98.     set the visible of sprite 20 to true
  99.     set the visible of sprite 12 to false
  100.   else if MirL = 0 then
  101.     set the visible of sprite 20 to false
  102.     set the visible of sprite 12 to false
  103.   else if MirL = 1 then
  104.     set the visible of sprite 20 to false
  105.     set the visible of sprite 12 to true
  106.   end if
  107.   
  108.   if MirR = 2 then
  109.     set the visible of sprite 19 to true
  110.     set the visible of sprite 21 to false
  111.   else if MirR = 0 then
  112.     set the visible of sprite 19 to false
  113.     set the visible of sprite 21 to false
  114.   else if MirR = 1 then
  115.     set the visible of sprite 19 to false
  116.     set the visible of sprite 21 to true
  117.   end if
  118.   
  119.   updatestage
  120. end check_it
  121.  
  122.